﻿/* ==============================================================================
*
*   Copyright (c) 2010, Pierre Favier
*   All rights reserved.
*
*   NTasking is free software: you can redistribute it and/or modify it
*   under the terms of the GNU General Public License as published by the
*   Free Software Foundation.
*
*   Redistribution and use in source and binary forms, with or without
*   modification, are permitted provided that the following conditions
*   are met:
*
*   -   Redistributions of source code must retain the above copyright notice,
*       this list of conditions and the following disclaimer.
*
*   -   Redistributions in binary form must reproduce the above
*       copyright notice, this list of conditions and the following
*       disclaimer in the documentation and/or other materials
*       provided with the distribution.
*
*   THIS SOFTWARE IS PROVIDED "AS IS" AND ANY EXPRESS OR IMPLIED
*   WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
*   OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
*   DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS
*   BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
*   EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
*   TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
*   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
*   ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
*   TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
*   THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
*   SUCH DAMAGE.
*
* ============================================================================== */

using System;
using NUnit.Framework;
using Rhino.Mocks;
using Rhino.Mocks.Constraints;

namespace NTasking.ValidationTests.Other
{

    [TestFixture]
    public class RelaxedRequeue : ValidationTest
    {

        internal class TaskWithRequeue : ValidationTestTask
        {

            [Entry]
            public Action<int, string, bool> Begin { get; private set; }


            [Entry]
            public Func<int, object, bool> EndOk { get; private set; }


            [Entry]
            public Func<object, object, bool> EndNok { get; private set; }


            internal TaskWithRequeue(IValidationTestResult result)
                : base(result)
            {
            }


            protected override void Body()
            {

                try
                {
                    Accept(Begin, (count, name, flag) =>
                    {
                        Requeue(EndOk);
                    });

                    Accept(EndOk, (obj1, obj2) =>
                    {
                        return true;
                    });

                }
                catch (Exception)
                {
                    Result.TestFailed();
                    throw;
                }

                try
                {
                    Accept(Begin, (count, name, flag) =>
                    {
                        Requeue(EndNok);
                    });

                    Result.TestFailed();
                }
                catch (SyntaxError)
                {
                }
                catch (Exception)
                {
                    Result.TestFailed();
                }
            }

        }


        [Test]
        public void TaskFinishesOnAbort()
        {
            TaskWithRequeue task = null;
            IValidationTestResult result = Mocks.DynamicMock<IValidationTestResult>();

            Settings.RequeueMode = AdaCompatibilityMode.RelaxedCompatibility;

            Ada.Declare(() =>
            {
                task = new TaskWithRequeue(result);

                // Setup text expectations

                Expect.Call(() => result.TaskFinished(null)).
                    IgnoreArguments().
                    Constraints(Is.Same(task));

                Expect.Call(result.TestFailed).Repeat.Never();

                Mocks.ReplayAll();
            },
            Begin: () =>
            {
                // Start test execution

                try 
	            {	        
		            task.Begin(1, "test", false);
	            }
	            catch (Exception)
	            {
	                result.TestFailed();
	            }

                try 
	            {	        
		            task.Begin(1, "test", false);
	            }
                catch (SyntaxError e)
	            {
                    if (e.ErrorCode != Errors.RequeueProfileMismatchError)
	                    result.TestFailed();
	            }
                catch (Exception)
                {
                    result.TestFailed();
                }

            });
        }

    }

}
